home *** CD-ROM | disk | FTP | other *** search
/ Click 5 / Click 5.iso / data / game5.dat / scripts / frame_1 / DoAction_4.as < prev    next >
Text File  |  2002-11-22  |  4KB  |  127 lines

  1. function GetNewOpinion64(l, r, c)
  2. {
  3.    if(l == 1)
  4.    {
  5.       if(c == 5)
  6.       {
  7.          GetNewZeroC64();
  8.          GetNewZeroR64();
  9.       }
  10.       else if(c == 1)
  11.       {
  12.          GetNewZeroC64();
  13.          GetNewZeroL64();
  14.       }
  15.       ChangeFreeSituation64(l,r,c + 1);
  16.       ChangeFreeSituation64(l,r,c - 1);
  17.       ChangeFreeSituation64(l,r + 1,c);
  18.       ChangeFreeSituation64(l,r - 1,c);
  19.    }
  20.    else if(l == 0)
  21.    {
  22.       GetNewZeroC64();
  23.       GetNewZeroR64();
  24.       GetNewZeroL64();
  25.    }
  26.    else
  27.    {
  28.       ChangeFreeSituation64(l,r,c + 1);
  29.       ChangeFreeSituation64(l,r,c - 1);
  30.       ChangeFreeSituation64(l,r + 1,c);
  31.       ChangeFreeSituation64(l,r - 1,c);
  32.       ChangeFreeSituation64(l - 1,r,c);
  33.       ChangeFreeSituation64(l - 1,r,c + 1);
  34.       ChangeFreeSituation64(l - 1,r,c - 1);
  35.       ChangeFreeSituation64(l - 1,r + 1,c);
  36.       ChangeFreeSituation64(l - 1,r - 1,c);
  37.       ChangeFreeSituation64(l - 1,r + 1,c + 1);
  38.       ChangeFreeSituation64(l - 1,r - 1,c + 1);
  39.       ChangeFreeSituation64(l - 1,r + 1,c - 1);
  40.       ChangeFreeSituation64(l - 1,r - 1,c - 1);
  41.    }
  42. }
  43. function ChangeFreeSituation64(l, r, c)
  44. {
  45.    if(l == 1 && c == 1)
  46.    {
  47.       if(eval("f" + String(l) + String(r) + String(c)).FishkiAviable)
  48.       {
  49.          eval("f" + String(l) + String(r) + String(c)).FishkiFree = Center(l,r,c);
  50.       }
  51.       GetNewZeroL64();
  52.    }
  53.    else if(l == 1 && c == 5)
  54.    {
  55.       if(eval("f" + String(l) + String(r) + String(c)).FishkiAviable)
  56.       {
  57.          eval("f" + String(l) + String(r) + String(c)).FishkiFree = Center(l,r,c);
  58.       }
  59.       GetNewZeroR64();
  60.    }
  61.    else if(eval("f" + String(l) + String(r) + String(c)).FishkiAviable)
  62.    {
  63.       eval("f" + String(l) + String(r) + String(c)).FishkiFree = Center(l,r,c);
  64.    }
  65. }
  66. function GetNewZeroC64()
  67. {
  68.    f02.FishkiFree = !f01.FishkiAviable || !f111.FishkiAviable;
  69.    f03.FishkiFree = !f04.FishkiAviable || !f115.FishkiAviable;
  70.    f08.FishkiFree = !f07.FishkiAviable || !f151.FishkiAviable;
  71.    f09.FishkiFree = !f010.FishkiAviable || !f155.FishkiAviable;
  72. }
  73. function GetNewZeroR64()
  74. {
  75.    f115.FishkiFree = Center(1,1,5);
  76.    f115.FishkiFree = f115.FishkiFree && (!f03.FishkiAviable || !f114.FishkiAviable);
  77.    f155.FishkiFree = Center(1,5,5);
  78.    f155.FishkiFree = f155.FishkiFree && (!f09.FishkiAviable || !f154.FishkiAviable);
  79.    f135.FishkiFree = Center(1,3,5);
  80.    f135.FishkiFree = f135.FishkiFree && (!f06.FishkiAviable || !f134.FishkiAviable);
  81. }
  82. function GetNewZeroL64()
  83. {
  84.    f111.FishkiFree = Center(1,1,1);
  85.    f111.FishkiFree = f111.FishkiFree && (!f02.FishkiAviable || !f112.FishkiAviable);
  86.    f151.FishkiFree = Center(1,5,1);
  87.    f151.FishkiFree = f151.FishkiFree && (!f08.FishkiAviable || !f152.FishkiAviable);
  88.    f131.FishkiFree = Center(1,3,1);
  89.    f131.FishkiFree = f131.FishkiFree && (!f05.FishkiAviable || !f132.FishkiAviable);
  90. }
  91. function GetFreeFunk64()
  92. {
  93.    FullFree64();
  94.    var l = 1;
  95.    while(3 >= l)
  96.    {
  97.       var r = 1;
  98.       while(6 - l >= r)
  99.       {
  100.          var c = 1;
  101.          while(6 - l >= c)
  102.          {
  103.             eval("f" + String(l) + String(r) + String(c)).FishkiFree = Center(l,r,c);
  104.             c++;
  105.          }
  106.          r++;
  107.       }
  108.       l++;
  109.    }
  110.    GetNewZeroC64();
  111.    GetNewZeroR64();
  112.    GetNewZeroL64();
  113. }
  114. function FullFree64()
  115. {
  116.    f422.FishkiFree = true;
  117.    f421.FishkiFree = true;
  118.    f412.FishkiFree = true;
  119.    f411.FishkiFree = true;
  120.    f01.FishkiFree = true;
  121.    f04.FishkiFree = true;
  122.    f05.FishkiFree = true;
  123.    f06.FishkiFree = true;
  124.    f07.FishkiFree = true;
  125.    f010.FishkiFree = true;
  126. }
  127.